home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 1 (Walnut Creek)
/
Aminet - June 1993 [Walnut Creek].iso
/
usenet
/
sources
/
volume89
/
devices
/
cb2l.1
next >
Wrap
Internet Message Format
|
1989-05-19
|
6KB
Path: xanth!ames!apple!oliveb!sun!swap!page
From: page%swap@Sun.COM (Bob Page)
Newsgroups: comp.sources.amiga
Subject: v89i151: callback2life - reset your battery-backed clock
Message-ID: <105717@sun.Eng.Sun.COM>
Date: 18 May 89 20:42:45 GMT
Sender: news@sun.Eng.Sun.COM
Lines: 141
Approved: page@sun.com
Submitted-by: balzer%frambo.DEC@decwrl.dec.com (Christian Balzer)
Posting-number: Volume 89, Issue 151
Archive-name: devices/cb2l.1
This will totally reset your battery backed clock (RTC). Particulary
useful if some brain-dead software munged your clock registers in a
way that SetClock will give you "Clock not found" type messages.
[uuencoded executable included. ..bob]
# This is a shell archive.
# Remove anything above and including the cut line.
# Then run the rest of the file through 'sh'.
# Unpacked files will be owned by you and have default permissions.
#----cut here-----cut here-----cut here-----cut here----#
#!/bin/sh
# shar: SHell ARchive
# Run the following text through 'sh' to create:
# callback2life.asm
# CallBack2Life.info.uu
# callback2life.uu
# This is archive 1 of a 1-part kit.
# This archive created: Thu May 18 13:08:38 1989
echo "extracting callback2life.asm"
sed 's/^X//' << \SHAR_EOF > callback2life.asm
X; CallBack2Life.Asm Copyright 1989 by Andrew Kopp 16-May-89
X; -----------------
X; THIS IS PERHAPS NOT THE BEST BUT AT LEAST ONE WAY TO "CALL BACK TO LIFE"
X; THE BATTERY BACKUP CLOCK EVEN IF YOU HAVE YOUR PERSONAL EXPERIENCE
X; WITH RESETTING CLOCKS ON HARDWARE LEVEL !
X; AFTER A NONE-MEDITATIONING SYSTEM CRASH MY CLOCK WAS NOT FOUND BY
X; THE "SETCLOCK LOAD" COMMAND AND OPTIONAL RESET WON`T WORK (V1.3).
X; THIS IS A BUG OF THE SETCLOCK 1.3 RELEASE !
X;
X; A BLOCKFILL IN THE LOCATION OF THAT DEVICE WAS ABLE TO REVIVE IT !
X; FOR COMPAREABLE FUTURE EVENTS AND FOR YOU I WROTE DOWN MY EXPERIENCE
X; IN AN EXECUTEABLE. WHEN THE CODE TERMINATES YOU GET FROM SETCLOCK A
X;
X; <unset> <unset> <unset>
X;
X; NOW SET YOU SYSTEM TIMER TO THE ACTUAL TIME AND RUN SETCLOCK WITH SAVE
X; OPTION TO STORE IT TO THE BATTERY BACKUP CLOCK.
X; IF YOU CAN'T REVIVE YOUR CLOCK WITH THIS PROGRAM WITHOUT REMOVING THE
X; THE STANDBY POWER OF YOUR CLOCK PLEASE SEND A NOTE !
X;
X; ---------------------------------------------------------------------
X; THIS PROGRAM MAY BE FREELY DISTRIBUTED AS LONG AS :
X;
X; - NO PARTS ARE CHANGED => COPY AS IS
X; - NOT MORE THAN 5 US$ FOR DISK COPY FEE
X; - NO FEE ON BBS FILEBASES
X;
X; ---------------------------------------------------------------------
X; - PAPERMAIL - - EMAILs -
X;
X; Andrew Kopp UUCP: via <CB> (see below)
X; Zu den Tannen 13
X; D-5810 Witten 3 BBS Ffm Dungeon : <049> 069 4990769 (Charly)
X; - Fed.Rep.Ger - German BTX Serv.: 0230279655-0001
X; ---------------------------------------------------------------------
X;*
X;* ______ /
X;* ______\O - The Software Brewery -
X;* \\
X;* o Sparkling, fresh software from West-Germany
X;*
X;* @@@@@ Straight from the bar to your Amiga
X;* |~~~|\
X;* | | |/
X;* |___| With our regards to the Software Distillery
X;*
X;* The Brewers are:
X;* Christian Balzer alias <CB>, Lattice C, user interfaces, beer addict.
X;* Heiko Rath alias <HR>, Assembler, ROM-Kernal stuff, Marabou addict.
X;* Andrew Kopp alias Charly, Aztec C, Hardware & communications, beer addict.
X;* Armin Sparr alias MARVIN, Aztec C, ARexx macros, Campari addict.
X;* Ralf Woitinas alias RAF, Assembler, anything, Ray-Tracing addict.
X;*
X;* Beverages: Altenmuenster Brauer Bier, Urfraenkisches Landbier, Jever.
X;*
X;* Send exotic drinks, comments, flames to:
X;*
X;* The Software Brewery
X;* Christian Balzer UUCP: decwrl!frambo.dec.com!CB
X;* Im Wingertsberg 45 ARPA: CB@frambo.dec.com
X;* D-6108 Weiterstadt CI$ : 71001,210 (be brief!)
X;* West Germany (F.R.G.) Fone: +49 6150 4151 (18:00-21:00 CET!)
X;*
X
XClockBase EQU $DC0000
XSize EQU 31 ; number of words-1 in the map
X
Xentry:
X lea ClockBase,a0 ; start on base of Clock and clear
X moveq #Size,d0 ; a block of size+1 words
X_l1: clr.w (a0)+
X dbf d0,_l1
X rts
X
X END
X
X
X; A note from the Editor (<CB>):
X; Well fellas, don't you just LOVE those sources that consist of
X; a sound 80% comments? :-) ;-)
SHAR_EOF
echo "extracting CallBack2Life.info.uu"
sed 's/^X//' << \SHAR_EOF > CallBack2Life.info.uu
X
Xbegin 644 CallBack2Life.info
XMXQ```0```````````#P`(@`%``,``0#`F+``````````````````````````C
XM`````R,``````````````"`````J```````````````````````\`"$``@#$3
XML]@#```````````````````#____``````?___\`````#____P`````/____J
XM``````____\`````#_\?_P`````/_Q__``````__'_\`````#_\?_P`````/+
XMP`!_``````__'_\`````#_\?_P`````/_Q__``````__'_\`````#____P``[
XM```/___^``````____P````````````````````````````````````````';
XM\````````!_\````````&^P``````/____X````'@````<```!P"J```<```+
XM$``#```0```<``%``'```!\``"`!\```'______P```/_____^````/_____5
XM@`!_________P'_\````___`?_O___S__\!_\````O__P'_W___Z___`?_?^S
XM#_K__\!_]_X/^O__P'_W_@_Z___`?_?^#_K__\!_]X``.O__P'_W@``Z___`4
XM?_>``#K__\!_]_X/^O__P'_W_@_Z___`?_?^#]K__\!_]_X/&O__P'_W___Y'
XM___`?_````/__\!_________P'_________`?________\!____X#___P'__9
XM_^`#___`?___Y!/__\!__P````'_P'_X`````#_`?^``````#\!_X``````/B
XIP``@``````````@`````(```#@````'@```#_____X``````````````V
X``
Xend
Xsize 626
SHAR_EOF
echo "extracting callback2life.uu"
sed 's/^X//' << \SHAR_EOF > callback2life.uu
X
Xbegin 644 callback2life
XM```#\P`````````#``````````(````$``````````$```/I````!$'Y`-P`&
XG`'`?0EA1R/_\3G4```/R```#Z@````````/R```#ZP````$```/R[
X``
Xend
Xsize 84
SHAR_EOF
echo "End of archive 1 (of 1)"
# if you want to concatenate archives, remove anything after this line
exit